home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
batchut
/
ben250.zip
/
BENDEMO.DA1
< prev
next >
Wrap
Text File
|
1990-01-04
|
2KB
|
45 lines
CURSOR OFF
ATTRIB 7 0 BOX 4 3 77 22 15 1 1 G
GOTOXY 6 5
WRITE 14 1 1 ██████ █ ███████ █ █ █ ██████ ██████ ██████ ██████ ███████
GOTOXY 6 6
WRITE 14 1 1 █ █ █ █ █ █ █ █ █ █ █ █ █ █
GOTOXY 6 7
WRITE 14 1 1 ██████ █ █ █ █ █ █ █ ██████ ██████ █ █ █████ █
GOTOXY 6 8
WRITE 14 1 1 █ █ █ █ █ █ █ █ █ █ █ █ █ █
GOTOXY 6 9
WRITE 14 1 1 ██████ █ █ █ █ █ █ ██████ ██████ ██████ █ █
GOTOXY 36 12 WRITE 15 1 2 PRESENTS ...
SOUND 100 150
SOUND 200 150
SOUND 300 150
SOUND 400 150
SOUND 500 150
SOUND 400 150
SOUND 300 150
SOUND 200 150
SOUND 100 150
GOTOXY 12 14
WRITE 12 1 1 ████████████████ ████████████████ █████ ██
GOTOXY 12 15
WRITE 12 1 1 ██ ██ ██ ██████ ██
GOTOXY 12 16
WRITE 12 1 1 ██ ██ ██ ██ ███ ██
GOTOXY 12 17
WRITE 12 1 1 ████████████████ ████████████████ ██ ███ ██
GOTOXY 12 18
WRITE 12 1 1 ██ ██ ██ ██ ███ ██
GOTOXY 12 19
WRITE 12 1 1 ██ ██ ██ ██ ███ ██
GOTOXY 12 20
WRITE 12 1 1 ██ ██ ██ ██ ████████
GOTOXY 12 21
WRITE 12 1 1 ████████████████ ████████████████ ██ ███████
BOX 1 3 3 22 0 3 4 G BOX 78 3 80 22 0 3 4 G
Writev 2 6 0 3 1 BATCH ENHANCER
Writev 79 6 0 3 1 BATCH ENHANCER
GOTOXY 1 2
WRITE 15 0 1 * * * * * * * *
CURSOR ON BOX 1 23 80 25 1 7 1 F GOTOXY 2 24 WRITE 1 7 4 Please enter your name: INLINE CURSOR OFF